home *** CD-ROM | disk | FTP | other *** search
/ ftp.cs.arizona.edu / ftp.cs.arizona.edu.tar / ftp.cs.arizona.edu / icon / newsgrp / group96a.txt / 000018_icon-group-sender _Tue Jan 16 11:43:29 1996.msg < prev    next >
Internet Message Format  |  1996-09-05  |  755b
  1. Received: by cheltenham.cs.arizona.edu; Tue, 16 Jan 1996 12:30:54 MST
  2. Date: Tue, 16 Jan 1996 11:43:29 -0600
  3. From: jeffery@dragon.cs.utsa.edu (Clinton Jeffery)
  4. Message-Id: <9601161743.AA15791@dragon.cs.utsa.edu>
  5. To: H.Lawson@tees.ac.uk
  6. Cc: icon-group@cs.arizona.edu
  7. In-Reply-To: <4B78DE79AC@scm_arkengarthdale.tees.ac.uk> (H.Lawson@tees.ac.uk)
  8. Subject: Re: Initialising tables
  9. Content-Length: 279
  10. Errors-To: icon-group-errors@cs.arizona.edu
  11. Status: O
  12.  
  13.  
  14. Oops: I can't have a variable named "default" now can I!  That last one
  15. had better be:
  16.  
  17. procedure Table(def, x[])
  18.    local rv := Table(def)
  19.    every k := pop(x) do rv[k] := pop(x)
  20.    return rv
  21. end
  22.  
  23. Clint Jeffery
  24. jeffery@ringer.cs.utsa.edu
  25. The University of Texas at San Antonio
  26.